gusucode.com > 依悠ASP广告管理系统 v2.1 > 依悠ASP广告管理系统 v2.1\code\Update.asp

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file = "AD_Conn.asp"-->
<%
'===================================================================================
'依悠广告管理系统 V2.1 使用帮助
'
'帮助你把网站上的所有广告按照广告大小或位置进行分类管理,然后用本系统分配的固定Scrip代码调用设置广告,获取代码请点广告管理的预览。
'
'安装说明:
'
'1. 需要支持ASP和Access数据库的空间。
'
'2. 管理员登陆页面:index.asp,用户名为:admin,密码:admin,请安装后立即修改!
'
'3. 数据库连接地址:AD_Conn.asp
'
'4. 发现任何问题、缺陷或者有必要增加些功能请通知作者,作者会尽力改进,谢谢。
'
'5. 本软件系免费程序,提供给个人免费使用,如果用于商业用途请酌情付费支持,请不要修改作者版权。
'
'6. 如建设网站中遇到任何问题可在论坛发问,必定回复。
'
'作者:双鱼    论坛:http://www.yiuu.net     QQ:125047083   E-MAIL:otutu@126.com	
'							
'							2008年5月8日
'==================================================================================
Set Rs = Server.CreateObject("Adodb.Recordset")
Sub U20
	Conn.Execute "Create Table tt_class(c_id IDENTITY (1,1),c_tid int,c_name char(25),primary key(c_id))"
	Conn.Execute "alter table tt_ad add a_class int,a_beiz text"
	Rs.Open "Select a_class from tt_ad",Conn,1,3
	Do While Not Rs.Eof
	Rs("a_class") = 0
	Rs.MoveNext
	Loop
	Rs.Close
Response.Write("1.x-2.0数据库升级成功")
End Sub
Sub U21
	Conn.Execute "Create Table tt_file(f_id IDENTITY (1,1),f_name char(50),f_path char(50),f_time char(50),f_size char(50),primary key(f_id))"	
	Conn.Execute "alter table tt_ad add a_js int"
Response.Write("2.0-2.1数据库升级成功")
End Sub
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>依悠广告 数据库升级</title>
<script type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>

<body>
<%
Dim GO
GO = Request.QueryString("GO")
Select Case GO
Case "1.x-2.0"
	Call U20
Case "2.0-2.1"
	Call U21
End Select
%>
<form name="form1" id="form1">
  <select name="menu1" size="1" onchange="MM_jumpMenu('parent',this,0)">
 	<option value="">请选择升级的版本</option>
    <option value="?GO=1.x-2.0">1.x-2.0</option>
    <option value="?GO=2.0-2.1">2.0-2.1</option>
  </select>
</form>

</body>
</html>